Define CharList
 ( 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
   'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f',
   'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
   'w', 'x', 'y', 'z', '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', '~', '`',
   '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '-', '_', '=', '+', '[', '{',
   ']', '}', ';', ':',"'", '"', ',', '<', '.', '>', '/', '?', '', '');

Define WidthList
 (  10,  10,  11,  12,  10,  10,  12,  12,   5,   8,  11,   9,  14,  11,  12,  10,
    12,  10,   9,   9,  12,  10,  14,  10,   9,   9,   9,   9,   7,   9,   8,   5,
     9,   9,   5,   5,   8,   5,  12,   9,   9,   9,   9,   7,   7,   5,   9,   8,
    11,   8,   8,   7,   9,   9,   9,   9,   9,   9,   9,   9,   9,   9,   9,   5,
     5,  15,   8,   9,  14,   7,  13,   9,   5,   5,   6,   9,  11,  11,   7,   7,
     7,   7,   6,   6,   3,   7,   4,  11,   4,  11,   5,   9,   9,   7);

Define RectList
 ( (   0,  0, 15, 21), (  16,  0, 13, 21), (  30,  0, 13, 21), (  44,  0, 14, 21),
   (  59,  0, 13, 21), (  73,  0, 14, 21), (  88,  0, 14, 21), ( 103,  0, 17, 21),
   ( 121,  0, 10, 21), ( 132,  0, 12, 21), ( 145,  0, 15, 21), ( 161,  0, 11, 21),
   ( 173,  0, 18, 21), ( 192,  0, 16, 21), ( 209,  0, 13, 21), ( 223,  0, 13, 21),
   ( 237,  0, 14, 21), ( 252,  0, 14, 21), ( 267,  0, 11, 21), ( 279,  0, 13, 21),
   ( 293,  0, 15, 21), ( 309,  0, 14, 21), ( 324,  0, 17, 21), ( 342,  0, 16, 21),
   ( 359,  0, 13, 21), ( 373,  0, 11, 21), ( 385,  0, 11, 21), ( 397,  0, 10, 21),
   ( 408,  0,  9, 21), ( 418,  0, 12, 21), ( 431,  0,  9, 21), ( 441,  0, 13, 21),
   ( 455,  0, 12, 21), ( 468,  0, 10, 21), ( 479,  0,  6, 21), ( 486,  0, 10, 21),
   ( 497,  0, 11, 21), ( 509,  0,  7, 21), ( 517,  0, 13, 21), ( 531,  0, 10, 21),
   ( 542,  0,  9, 21), ( 552,  0, 13, 21), ( 566,  0, 11, 21), ( 578,  0,  8, 21),
   ( 587,  0,  8, 21), ( 596,  0,  7, 21), ( 604,  0, 11, 21), ( 616,  0,  9, 21),
   ( 626,  0, 13, 21), ( 640,  0, 11, 21), ( 652,  0, 11, 21), ( 664,  0, 10, 21),
   ( 675,  0, 10, 21), ( 686,  0,  9, 21), ( 696,  0, 10, 21), ( 707,  0,  9, 21),
   ( 717,  0, 11, 21), ( 729,  0, 10, 21), ( 740,  0, 10, 21), ( 751,  0,  9, 21),
   ( 761,  0,  9, 21), ( 771,  0, 10, 21), ( 782,  0, 11, 21), ( 794,  0,  4, 21),
   ( 799,  0,  5, 21), ( 805,  0, 16, 21), ( 822,  0, 11, 21), ( 834,  0,  9, 21),
   ( 844,  0, 16, 21), ( 861,  0,  9, 21), ( 871,  0, 14, 21), ( 886,  0,  9, 21),
   ( 896,  0,  8, 21), ( 905,  0,  8, 21), ( 914,  0,  8, 21), ( 923,  0, 11, 21),
   ( 935,  0, 10, 21), ( 946,  0, 11, 21), ( 958,  0, 10, 21), ( 969,  0,  8, 21),
   ( 978,  0, 11, 21), ( 990,  0,  8, 21), ( 999,  0,  7, 21), (1007,  0,  6, 21),
   (1014,  0,  4, 21), (1019,  0,  7, 21), (1027,  0,  5, 21), (1033,  0, 10, 21),
   (1044,  0,  4, 21), (1049,  0, 10, 21), (1060,  0,  9, 21), (1070,  0,  9, 21),
   (1080,  0, 15, 21), (1096,  0, 13, 21));

Define OffsetList
 ( (-3, 0), (-2, 0), ( 0, 0), (-1, 0), (-2, 0), (-2, 0), ( 0, 0), (-2, 0),
   (-2, 0), (-1, 0), (-1, 0), (-1, 0), (-2, 0), (-2, 0), ( 0, 0), (-2, 0),
   (-1, 0), (-2, 0), (-1, 0), ( 0, 0), ( 1, 0), ( 0, 0), ( 0, 0), (-2, 0),
   ( 0, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0), (-4, 0),
   (-2, 0), (-1, 0), ( 0, 0), (-4, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0),
   ( 0, 0), (-4, 0), (-1, 0), ( 0, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0),
   (-1, 0), (-2, 0), (-3, 0), (-2, 0), (-1, 0), (-1, 0), (-1, 0), ( 0, 0),
   (-1, 0), ( 0, 0), ( 0, 0), ( 1, 0), ( 0, 0), (-1, 0), (-1, 0), ( 2, 0),
   ( 0, 0), ( 0, 0), (-1, 0), ( 0, 0), (-1, 0), ( 0, 0), ( 0, 0), ( 1, 0),
   ( 0, 0), (-3, 0), (-1, 0), (-1, 0), ( 1, 0), ( 1, 0), (-1, 0), ( 0, 0),
   (-2, 0), (-1, 0), (-1, 0), ( 0, 0), ( 1, 0), ( 1, 0), (-1, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), (-2, 0), ( 0, 0), (-3, 0), (-3, 0));

Define KerningPairs
 ("11","AT","AV","AW","AY","Av","Aw","Ay","F,","F.","FA","LV","LW","Ly","P,","P.",
  "PA","T,","T-","T.","T:","T;","TA","Ta","Tc","Te","Ti","To","Tr","Ts","Tu","Tw",
  "Ty","V,","V-","V.","V:","V;","VA","VO","Va","Ve","Vi","Vo","Vr","Vu","Vy","W,",
  "W-","W.","W:","W;","WA","Wa","We","Wi","Wo","Wr","Wu","Wy","Y,","Y-","Y.","Y:",
  "Y;","YA","Ya","Ye","Yi","Yo","Yp","Yq","Yu","Yv","r,","r.","rc","rd","re","rg",
  "ro","rq","v,","v.","w,","w.","y,","y.","G,","G.","St");

Define KerningValues

 (  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -2,  -2,  -2,  -1,  -1,  -1,  -2,  -2,

    -2,  -1,  -1,  -1,  -1,  -1,  -1,  -2,  -2,  -2,  -1,  -2,  -1,  -2,  -1,  -1,

    -1,  -2,  -1,  -2,  -1,  -1,  -1,  -1,  -2,  -2,  -1,  -2,  -1,  -1,  -2,  -2,

    -1,  -2,  -1,  -1,  -1,  -2,  -2,  -1,  -2,  -1,  -1,  -2,  -2,  -1,  -2,  -1,

    -1,  -1,  -2,  -2,  -1,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -1,  -1,  -1,  -1,

    -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -2,  -2,  -1);

CreateLayer               Main;
LayerSetImage             Main 'TimesNewRoman13Italics';
LayerSetAscent            Main 16;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (4);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 1;
LayerSetLineSpacingOffset Main 1;
LayerSetPointSize         Main 13;

SetDefaultPointSize  13;
